﻿Module Module1
  Sub Main()

    Dim data As Date = New Date(2008, 3, 1)
    Dim giorni As Integer = 7
    ' somma "giorni" alla data iniziale:
    data = data.AddDays(giorni)
    ' risultato: 08/03/2008:
    Console.WriteLine( _
       data.ToString("dd/MM/yyyy"))
    Console.ReadLine()

  End Sub
End Module
